Imports Castle.ActiveRecord

Namespace Model
    ''' <summary>
    '''	Gerado por MyGeneration usando o template ActiveRecord Object Mapper-1.0.3
    '''	Criado em 14/08/2010 00:29:39
    ''' </summary>
    ''' <remarks></remarks>

    <Serializable(), ActiveRecord("unidade", DynamicUpdate:=True)> _
    Public Class Unidade
        Inherits ActiveRecordBase(Of Unidade)

        Private _cd_unidade As Integer
        Private _unidade_sigla As String
        Private _unidade_descricao As String


        Private _Produtos As IList(Of Model.Produto) = New List(Of Model.Produto)
        Private _NFItens As IList(Of Model.Nfitem) = New List(Of Model.Nfitem)

        <PrimaryKey(PrimaryKeyType.Sequence, SequenceName:="unidade_cd_unidade_seq")> _
        Public Property cd_unidade() As Integer
            Get
                Return _cd_unidade
            End Get
            Set(ByVal value As Integer)
                _cd_unidade = value
            End Set
        End Property

        <[Property]("unidade_sigla")> _
        Public Property unidade_sigla() As String
            Get
                Return _unidade_sigla
            End Get
            Set(ByVal value As String)
                _unidade_sigla = value
            End Set
        End Property

        <[Property]("unidade_descricao")> _
        Public Property unidade_descricao() As String
            Get
                Return _unidade_descricao
            End Get
            Set(ByVal value As String)
                _unidade_descricao = value
            End Set
        End Property

        <HasMany(GetType(Model.Produto), Table:="produto", ColumnKey:="cd_unidade", Inverse:=True, Lazy:=True)> _
        Public Property Produto() As IList(Of Model.Produto)
            Get
                Return _Produtos
            End Get
            Set(ByVal value As IList(Of Model.Produto))
                _Produtos = value
            End Set
        End Property
        <HasMany(GetType(Model.Nfitem), Table:="nfitem", ColumnKey:="cd_unidade", Inverse:=True, Lazy:=True)> _
        Public Property NfItem() As IList(Of Model.Nfitem)
            Get
                Return _NFItens
            End Get
            Set(ByVal value As IList(Of Model.Nfitem))
                _NFItens = value
            End Set
        End Property
    End Class
End Namespace